Top 10k strings from Club Record Controller (1982)(Sinclair Research)[a].tap in <root> / bin / z80 / software / Sinclair Spectrum Collection TOSEC.exe / Sinclair ZX Spectrum - Utilities & Educational / Sinclair ZX Spectrum - Utilities & Educational - [TAP] (TOSEC-v2007-01-01) /
Back to the directory listing
2 b+(n=s);c$(m
2 ;" ";z$(
1 qq,a;n$(p,7
1 q$(n);" ";c$(m
1 p$(n)=n$(c,x
1 n;" Addr ";n-b;" ";
1 n$(n)=n$(n-b)
1 n$(n)=n$(n+b)
1 ln,a;q$(n);" ";
1 l$(s*g-b):
1 l$(g*n-b)+i)
1 l$(g*n+b)=
1 l$(g*n+b)-b)
1 l$(g*cn-b):
1 g;q$(n);" ";
1 g;("Member's name"
1 g;"Member's name"
1 g;" 0 Member's name"
1 f,b;"Too small":
1 f,b;"Too large":
1 f,b;"Press any letter to continue."
1 f,b;"Press a key from 1 to 9":
1 f,b;"Press a key from 0 to ";l;"."
1 f,b;"Press Y for yes, N for no."
1 f,a;z$;z$;
1 f,a;z$;z$:
1 f,a;"Printing details"
1 f,a;"Press: R- repeat mode; P- print screen; any other letter- exit."
1 f,a;"Press: P - print screen; any other letter to continue."
1 f,a;"Press a key from 1 to ";l:
1 f,a;"Please confirm: Y - yes, delete;N - no, keep this record."
1 f,a;"Maximum length exceeded; please re-enter."
1 f,a;"Is this value to be there (Y) ornot (N)? "
1 f,a;"File being amended ";z$
1 f,a;"Enter the contents on which"'"the condition applies.":
1 f,a;"Enter number in range 6 to 20."
1 f,a;"Enter number in range 1 to 12."
1 f,a;"Enter line ";r$;" ";z$
1 f,a;" Error, enter a number";z$
1 date arm/ser reg no grade
1 c
1 b;p$(n-b);
1 b;"Input ignored";
1 b''" Sort field: ";
1 b'"contains ";
1 b'"On which field is the condition to apply?"''
1 b'" Your field names are:"'':
1 aaaaaaaaaaaaaaa aa a aaaa aa gaa aa aa
1 aaa aaaa aaa a aa aa B
1 a;"Tel. no.?";
1 a;"; field too long. Line to amend? (0 if none)":
1 a$(en-st+b)
1 Updating file
1 PRINT MEMBERS' DETAILS
1 Member's record does not existYour file will now be saved for future use - version no. Which line to amend (1 to 7 or A to I)? Press 0 when finished.V*
1 List complete"
1 LIST OF MEMBERS
1 International Computers Ltd '82"
1 Condition:
1 Are you happy with this?
1 ;"Version ";w''''
1 ;"CLUB RECORD CONTROLLER"
1 ,b;"room for ";o;" records."
1 ,b;"Number of optional fields ";l''
1 ,a;"How many spaces do you want at the start of each line?"
1 +n,f;"Length ";i
1 +n,b;n;" ";q$(n)
1 +n);" ";q$(n);" ";
1 'j$(b)'j$(g):
1 '"With which member do you want tostart?"
1 '"How many lines do you want for each name and address?"
1 '"Enter ";
1 '"Each name and address will be printed over ";lf;" lines and"'"each line will start with ";tb'"spaces."
1 "Tel no ";c$(76
1 "Press: A - print full details"''" N - names and addresses only."
1 "Press: A - all members"'" S - specific members"'" C - on condition"
1 "Condition field: ";
1 "Address ";n-b;"?"
1 "7 Tel no ";
1 "1 Name ";
1 "'"field ";
1 " ";n;" ";q$(n)
1 Record already exists - you can only amend or delete it. 1 Add new member's details 2 Alter member's details 3 Remove member's details 4 List members' names 5 Display members' details 6 Print member's details 7 Save file 8 Stop Press a key from 1 to 8
1 MEMBER'S DETAILS
1 File full; no more records can be added.W
1 Press N to make changes or any other letter to continue.
1 D
1 aa a a aa gaa aa aa